declare
n emp.empno%type:=&n;
sal_emp emp.sal%type;
comm_emp emp.comm%type;
cursor salary is
select sal from emp where empno=n;
begin
open salary;
fetch salary into sal_emp;
dbms_output.put_line(' sal  = '||sal_emp);
close salary;
if sal_emp >1500 then
comm_emp:= sal_emp*20/100;
elsif (sal_emp <=1500 and sal_emp >=1000) then
comm_emp:= sal_emp*15/100;
elsif (sal_emp <1000 and sal_emp >=1) then
comm_emp:= sal_emp*10/100;
else
comm_emp:= 0;
end if;
dbms_output.put_line('comm = '||comm_emp);
update emp
set comm=comm_emp
where empno=n;
end;
/
